home *** CD-ROM | disk | FTP | other *** search
/ 100 Plus Great Games 2 / 100PLUSV2.BIN / games / PadHop.dxr / Internal_26_set up level 2.ls < prev    next >
Encoding:
Text File  |  2002-01-31  |  2.5 KB  |  93 lines
  1. property pSprite, spriteNum, pGo
  2. global gFloats, gFrog, gCurrentFloat, gInMotion
  3.  
  4. on beginSprite me
  5.   pGo = 0
  6.   pSprite = sprite(spriteNum)
  7.   gFloats.add(pSprite)
  8.   if gFloats.count = 19 then
  9.     gFloats[1].loc = point(150, 400)
  10.     gFloats[2].loc = point(180, 250)
  11.     gFloats[2].pFla = 1
  12.     gFloats[2].pLoc = gFloats[2].locH
  13.     gFloats[2].pdir = -2
  14.     gFloats[3].loc = point(440, 100)
  15.     gFloats[3].flipH = 0
  16.     gFloats[3].pSpeed = -3
  17.     gFloats[4].loc = point(350, -50)
  18.     gFloats[4].flipH = 1
  19.     gFloats[4].pSpeed = 5
  20.     gFloats[5].loc = point(250, -200)
  21.     gFloats[5].pFla = 1
  22.     gFloats[5].pLoc = gFloats[5].locH
  23.     gFloats[5].pdir = -3
  24.     gFloats[6].loc = point(205, -350)
  25.     gFloats[6].pFla = 1
  26.     gFloats[6].pLoc = gFloats[6].locH
  27.     gFloats[6].pdir = 2
  28.     gFloats[7].loc = point(400, -500)
  29.     gFloats[7].flipH = 0
  30.     gFloats[7].pSpeed = -5
  31.     gFloats[8].loc = point(300, -650)
  32.     gFloats[8].flipH = 0
  33.     gFloats[8].pSpeed = -7
  34.     gFloats[9].loc = point(425, -800)
  35.     gFloats[9].pFla = 1
  36.     gFloats[9].pLoc = gFloats[9].locH
  37.     gFloats[9].pdir = -4
  38.     gFloats[10].loc = point(410, -950)
  39.     gFloats[10].pFla = 1
  40.     gFloats[10].pLoc = gFloats[10].locH
  41.     gFloats[10].pdir = 3
  42.     gFloats[11].loc = point(267, -1100)
  43.     gFloats[11].flipH = 0
  44.     gFloats[11].pSpeed = -7
  45.     gFloats[12].loc = point(375, -1250)
  46.     gFloats[12].rolla = 1
  47.     gFloats[12].flipH = 0
  48.     gFloats[12].freak = 180
  49.     gFloats[12].pSpeed = -6
  50.     gFloats[13].loc = point(89, -1400)
  51.     gFloats[13].rolla = 1
  52.     gFloats[13].flipH = 0
  53.     gFloats[13].freak = 100
  54.     gFloats[13].pSpeed = -5
  55.     gFloats[14].loc = point(380, -1550)
  56.     gFloats[14].flipH = 1
  57.     gFloats[14].pSpeed = 5
  58.     gFloats[15].loc = point(270, -1700)
  59.     gFloats[15].pFla = 1
  60.     gFloats[15].pLoc = gFloats[15].locH
  61.     gFloats[15].pdir = 5
  62.     gFloats[16].loc = point(290, -1850)
  63.     gFloats[16].pFla = 1
  64.     gFloats[16].pLoc = gFloats[16].locH
  65.     gFloats[16].pdir = -4
  66.     gFloats[17].loc = point(166, -2000)
  67.     gFloats[17].pSpeed = -3
  68.     gFloats[18].loc = point(399, -2150)
  69.     gFloats[18].rolla = 1
  70.     gFloats[18].freak = 75
  71.     gFloats[18].flipH = 1
  72.     gFloats[18].pSpeed = 5
  73.     gFloats[19].loc = point(430, -2300)
  74.     gCurrentFloat = gFloats[1]
  75.   end if
  76. end
  77.  
  78. on enterFrame me
  79.   if pGo then
  80.     if pSprite = gCurrentFloat then
  81.       if pSprite.locV >= 400 then
  82.         repeat with i in gFloats
  83.           i.pGo = 0
  84.         end repeat
  85.         gInMotion = 0
  86.       end if
  87.     end if
  88.     gFrog.locV = gCurrentFloat.locV
  89.     gFrog.pLocV = gFrog.locV
  90.     pSprite.locV = pSprite.locV + 5
  91.   end if
  92. end
  93.